home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Magazin 1997 March / Image.iso / schwieri.dxr / Schwierigk_51_-Nächster Spieler--Text vorbereiten.ls < prev    next >
Encoding:
Text File  |  1996-10-28  |  975 b   |  30 lines
  1. global gWette, gWetten, gWettIni, gParams, gParamsAll, gDifficulty, gDragging, gPlayerNames, gPlayerNumber
  2.  
  3. on enterFrame
  4. end
  5.  
  6. on exitFrame
  7.   if gWette < 10 then
  8.     set gWettIni to loadini("Wette0" & gWette & ".ini")
  9.   else
  10.     set gWettIni to loadini("Wette" & gWette & ".ini")
  11.   end if
  12.   set gParamsAll to getAt(gWettIni, 1)
  13.   set gParams to gParamsAll
  14.   invisibleSprites(11, 16)
  15.   set the puppet of sprite 7 to 1
  16.   set the visible of sprite 7 to 0
  17.   set the castNum of sprite 7 to the number of member "WettTxt01" + gWette - 1
  18.   set the ink of sprite 7 to 36
  19.   set the locH of sprite 7 to 5
  20.   set the locV of sprite 7 to 40
  21.   SetWetteParamsTextfeld()
  22.   set the puppet of sprite 2 to 1
  23.   set the visible of sprite 2 to 0
  24.   set the castNum of sprite 2 to the number of member "Icon01gelb" + gWette - 1
  25.   set the blend of sprite 2 to 100
  26.   put getPropAt(gPlayerNames, gPlayerNumber) into field "NameFieldKurz"
  27.   set the visible of sprite 2 to 1
  28.   preLoad(the frame + 1)
  29. end
  30.